Skip to main content
This forum is closed to new posts and responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:

HCL Software Customer Support Portal for U.S. Federal Government clients
HCL Software Customer Support Portal

Notes/Domino 6 and 7 Forum

Notes/Domino 6 and 7 Forum

  

PreviousPrevious NextNext

RE: Deleting Orphans
~Bella Asaresaberggon 28.Oct.03 08:48 PM a Web browser
Domino Designer 6.0.1 Windows NT


on error goto errhandler

For j = 1 To dc.Count
Set doc = dc.GetNthDocument(j)
If doc.IsResponse = True Then
Set parentdoc = db.GetDocumentByUNID(doc.ParentDocumentUNID)
If (parentdoc is nothing)or (parentdoc.Responses Is Nothing) Then
Call doc.Remove(True)
End If
End If
Next j
exit sub

errhandler:
set parentdoc = nothing
resume next

HTH
Sriram




Deleting Orphans (~Ted Desveluche... 28.Oct.03)
. . Here is an archiving routine I use.... (~Fred Xanjumima... 28.Oct.03)
. . RE: Deleting Orphans (~Bella Asaresab... 28.Oct.03)
. . RE: Deleting Orphans (~Bill Frokimari... 28.Oct.03)

Document Options






  Document options
Print this pagePrint this page

Search this forum

Forum views and search


  Forum views and search
Date (threaded)
Date (flat)
With excerpt
Category
Platform
Release
Advanced search

Member Tools


RSS Feeds

 RSS feedsRSS
All forum posts RSS
All main topics RSS